;****************************************************************************
;
;  6 5 0 2   C   C O M P I L E R   C O N S T A N T   D E F I N I T I O N S 
;
;	                      (11- 8 - 90)
;
;****************************************************************************

;		.linklist
		.symbols

******************************************************************************

		.MODULE	__OUTPUT_CHANNEL

lib_temp_constants:	.section	stacked, ref_only

		.global	__OUTPUT_CHANNEL

;	__OUTPUT_CHANNEL is 2 bytes long.

__OUTPUT_CHANNEL:	.blkb	2	;output channel #

		.ENDMOD

******************************************************************************

		.MODULE	__INPUT_CHANNEL

lib_temp_constants:	.section	stacked, ref_only

		.global	__INPUT_CHANNEL

;	__INPUT_CHANNEL is 2 bytes long.

__INPUT_CHANNEL:  	.blkb	2	;input channel #

		.ENDMOD

******************************************************************************

		.MODULE	__FUNCTION_RET_ADDR

lib_temp_constants:	.section	stacked, ref_only

		.global	__FUNCTION_RET_ADDR

;	__FUNCTION_RET_ADDR is used for longs, floats & doubles and is
;	8 bytes long.

__FUNCTION_RET_ADDR:	.blkb	8	;function return address

		.ENDMOD

******************************************************************************

		.MODULE	__OPER1_TEMP_STORE

lib_temp_constants:	.section	stacked, ref_only

		.global	__OPER1_TEMP_STORE

;	__OPER1_TEMP_STORE is used for longs, floats & doubles and is
;	8 bytes long.

__OPER1_TEMP_STORE:	.blkb	8	;operand #1 temporary storage

		.ENDMOD

******************************************************************************

		.MODULE	__OPER2_TEMP_STORE

lib_temp_constants: .section	stacked, ref_only

		.global	__OPER2_TEMP_STORE

;	__OPER2_TEMP_STORE is used for longs, floats & doubles and is
;	8 bytes long.

__OPER2_TEMP_STORE:	.blkb	8	;operand #2 temporary storage

		.ENDMOD

******************************************************************************

		.MODULE	__OPER1_CONVERSION_STORE

lib_temp_constants: .section	stacked, ref_only

		.global	__OPER1_CONVERSION_STORE

;	__OPER1_CONVERSION_STORE is used for longs, floats & doubles and is
;	8 bytes long.

__OPER1_CONVERSION_STORE:  .blkb  8	;operand #1 temporary conversion

		.ENDMOD

******************************************************************************

		.MODULE	__OPER2_CONVERSION_STORE

lib_temp_constants: .section	stacked, ref_only

		.global	__OPER2_CONVERSION_STORE

;	__OPER2_CONVERSION_STORE is used for longs, floats & doubles and is
;	8 bytes long.

__OPER2_CONVERSION_STORE:  .blkb  8	;operand #2 temporary conversion

		.ENDMOD

******************************************************************************

		.MODULE	__OPER1_BANKED_STORE

lib_temp_constants:	.section	stacked, ref_only

		.global	__OPER1_BANKED_STORE

;	__OPER1_BANKED_STORE is used to store longs, floats & doubles from
;	another bank and is 8 bytes long.

__OPER1_BANKED_STORE:	.blkb	8	;operand #1 bank storage

		.ENDMOD

******************************************************************************

		.MODULE	__OPER2_BANKED_STORE

lib_temp_constants: .section	stacked, ref_only

		.global	__OPER2_BANKED_STORE

;	__OPER2_BANKED_STORE is used to store longs, floats & doubles from
;	another bank and is 8 bytes long.

__OPER2_BANKED_STORE:	.blkb	8	;operand #2 bank storage

		.ENDMOD

******************************************************************************

		.MODULE	___SPRINTF_FLAG

lib_temp_constants: .section	stacked, ref_only

		.global	___SPRINTF_FLAG
		.global	___SPRINTF_ADDRESS

___SPRINTF_FLAG:	.blkb	1	;'sprintf' flag
___SPRINTF_ADDRESS:	.blkb	2	;'sprintf' address

		.ENDMOD

******************************************************************************

		.MODULE	___SSCANF_FLAG

lib_temp_constants: .section	stacked, ref_only

		.global	___SSCANF_FLAG
		.global	___SSCANF_ADDRESS

___SSCANF_FLAG:		.blkb	1	;'sscanf' flag
___SSCANF_ADDRESS:	.blkb	2	;'sscanf' address

		.ENDMOD

******************************************************************************

		.MODULE	___PRINTF_STK_PTR

lib_temp_constants: .section	stacked, ref_only

		.global	___PRINTF_STK_PTR

___PRINTF_STK_PTR:	.blkb	2	;printf argument pointer

		.ENDMOD

******************************************************************************

		.MODULE	___SCANF_STK_PTR

lib_temp_constants: .section	stacked, ref_only

		.global	___SCANF_STK_PTR

___SCANF_STK_PTR:	.blkb	2	;scanf argument pointer

		.ENDMOD

******************************************************************************

		.MODULE	__FIELD_START

lib_temp_constants: .section	stacked, ref_only

		.global	__FIELD_START
		.global	__FIELD_SIZE

__FIELD_START:		.blkb	1		;field starting bit #
__FIELD_SIZE:		.blkb	1		;field size

		.ENDMOD

******************************************************************************

		.MODULE	__float_precision

;	The value in '__float_precision' is used by the single precision
;	floating point routines such as 'sin' and 'cos' to determine the
;	precision that is used in the calculation.  Smaller numbers result
;	in more precision, and more calculation time.

lib_const_data:  .section

		.global	__float_precision

__float_precision:  .float	1.0e-8

		.ENDMOD

******************************************************************************

		.MODULE	__double_precision

;	The value in '__double_precision' is used by the double precision
;	floating point routines such as 'sin' and 'cos' to determine the
;	precision that is used in the calculation.  Smaller numbers result
;	in more precision, and more calculation time.

lib_const_data:  .section

		.global	__double_precision

__double_precision:  .double	1.0e-18

		.ENDMOD

******************************************************************************

		.MODULE	__float_one

;	The following is used to increment single precision floating point
;	numbers.

lib_const_data:	.section

		.global	__float_one

__float_one:	.float	1.0

		.ENDMOD

******************************************************************************

		.MODULE	__double_one

;	The following is used to increment double precision floating point
;	numbers.

lib_const_data:	.section

		.global	__double_one

__double_one:	.double	1.0

		.ENDMOD

******************************************************************************

		.MODULE	__float_minus_one

;	The following is used to decrement single precision floating point
;	numbers.

lib_const_data:	.section

		.global	__float_minus_one

__float_minus_one:  .float  -1.0

		.ENDMOD

******************************************************************************

		.MODULE	__double_minus_one

;	The following is used to decrement double precision floating point
;	numbers.

lib_const_data:	.section

		.global	__double_minus_one

__double_minus_one:  .double  -1.0

		.ENDMOD

******************************************************************************

		.MODULE	__output_table

;	The following symbol is defined for the case where the run-time
;	startup routine does not contain it, but it gets linked in from
;	using the in memory format conversion 'sprintf'. The only purpose
;	is to keep from getting an unresolved external reference.

lib_program:	.section

		.global	__output_table

__output_table:  .equal  $

		.ENDMOD

******************************************************************************

		.MODULE	__input_table

;	The following symbols are defined for the case where the run-time
;	startup routine does not contain them, but they get linked in from
;	using the in memory format conversion 'sscanf'. The only purpose
;	is to keep from getting unresolved external references.

lib_program:	.section

		.global	__input_table
		.global	__unget_table

__input_table:	 .equal	 $
__unget_table:	 .equal	 $

		.ENDMOD

******************************************************************************

		.END

